
**APPENDIX TABLE 5 : Individual Outcomes - Individual Variables**

**INDIVIDUAL OUTCOMES FOR VARIABLES with INFO AT BASELINE AND FOLLOW UP**

use "$data/merge_bl_fu", clear

gen A_EDT_elig=(A_EDT==1 & d_lleligible==1)
gen A_EDT_no_elig=(A_EDT==1 & d_lleligible==0)
gen nobt_ne_nolw = EDT_treat==0 & d_lleligible==0 & L_ttreat==0

*Diff in diff*
local mean "log_monthly_expenditure_fu log_savings_fu _index_house_fu log_livestock_value_fu inc_asset_aggregate3_fu index_trust_fu index_optimism_fu _optimism8_f5_fu outlook_life_aggregate_fu"
sum `mean' if EDT_treat==0 & d_lleligible==1 & L_ttreat==0

local xvars "A_EDT_elig A_EDT_no_elig B_LL C_EDT_LL nobt_ne_nolw female bl_bus_owner fu_dummy*"
local yvars "log_monthly_expenditure log_savings _index_house log_livestock_value inc_asset_aggregate3 index_trust more_help more_collective index_optimism _optimism8_f5 outlook_life_aggregate"
est clear
local j =1
foreach y in `yvars' {
	reg `y'_fu `y'_bl `xvars' if ( fu_dummy7==0 ), cl(co_code1)
	estimates store `y'_fu
	
	test A_EDT_elig = B_LL
	estadd scalar p_diff1 = r(p)
	
	test A_EDT_elig =C_EDT_LL
	estadd scalar p_diff2 = r(p)
	
	test B_LL=C_EDT_LL
	estadd scalar p_diff3 = r(p)
	
	test nobt_ne_nolw= A_EDT_no_elig
	estadd scalar p_diff4 = r(p)
	
	sum `y'_bl if (fu_dummy7==0  )
	sum `y'_bl if (fu_dummy7==0   & A_EDT==0 & B_LL==0 & C_EDT_LL==0 & d_lleligible==1)
	estadd scalar mean_y=r(mean)
	local j = `j'+1
}
estout * using "$out/OA-TableA5-Part1.xls", cells("b(star fmt(3))" se(par(`"="("' `")""'))) ///
	keep(A_EDT_elig A_EDT_no_elig nobt_ne_nolw B_LL C_EDT_LL) ///
	starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2 p_diff1 p_diff2 p_diff3 p_diff4, fmt(2 0 2 2 2 2) ///
	labels("mean dependent variable" "N.obs" "R-Sq" "p1" "p2" "p3" "p4")) replace
estimates clear


**INDIVIDUAL OUTCOMES FOR VARIABLES ONLY AT FOLLOW UP**

capture log close

local xvars "A_EDT_elig A_EDT_no_elig B_LL C_EDT_LL nobt_ne_nolw female bl_bus_owner fu_dummy*"
local yvars "d_give_loan08_fu d_take_loan08_fu co_outcomes_aggregate_fu" 
est clear
local j =1
foreach y in `yvars' {
	reg `y' `xvars' if ( fu_dummy7==0 ), cl(co_code1)
	estimates store `y'
	test A_EDT_elig = B_LL
	estadd scalar p_diff1 = r(p)
	test A_EDT_elig =C_EDT_LL
	estadd scalar p_diff2 = r(p)
	test B_LL=C_EDT_LL
	estadd scalar p_diff3 = r(p)
	test nobt_ne_nolw= A_EDT_no_elig
	estadd scalar p_diff4 = r(p)
	sum `y' if (fu_dummy7==0 )
	sum `y' if (fu_dummy7==0 & A_EDT==0 & B_LL==0 & C_EDT_LL==0 & d_lleligible==1)
	estadd scalar mean_y=r(mean)
	local j = `j'+1
}
estout * using "$out/OA-TableA5-Part2.xls", cells("b(star fmt(3))" se(par(`"="("' `")""'))) ///
	keep(A_EDT_elig A_EDT_no_elig nobt_ne_nolw B_LL C_EDT_LL ) ///
	starlevels(* 0.10 ** 0.05 *** 0.01) stats(mean_y N r2  p_diff1 p_diff2 p_diff3 p_diff4, fmt(2 0 2 2 2) ///
	labels("mean dependent variable" "N.obs" "R-Sq" "p1" "p2" "p3" "p4")) replace
estimates clear

gen BT_nlw_elig=(A_EDT==1 & B_LL==0 & d_lleligible==1)
gen no_bt_no_elig_nlw = A_EDT==0 & d_lleligible==0 

reg log_monthly_expenditure_fu log_monthly_expenditure_bl A_EDT d_lleligible female bl_bus_owner fu_dummy* if (fu_dummy7==0 & L_ttreat==0), cl(co_code1)
sum log_monthly_expenditure_fu if (fu_dummy7==0 & EDT_treat==0 & L_ttreat==0 )
sum log_monthly_expenditure_fu if (fu_dummy7==0 & EDT_treat==0 & L_ttreat==0 & d_lleligible==1)

reg log_monthly_expenditure_fu log_monthly_expenditure_bl EDT_treat d_lleligible female bl_bus_owner fu_dummy* if ( fu_dummy7==0 ), cl(co_code1)
